┌────────────────────────────────┐ │ ░░░ ░░▓ ░▓▓ ███ ▓▓░ ▓░░ │ │ ~ M O O N ~ │ └────────────────────────────────┘
prd-web-01.centraldc.gr
LOCATION:
/usr/share/doc/perl-Test-Simple/t/Test2/modules/Hub
☗ ROOT
↻ REFRESH
✎ EDIT FILE
EDITING: Interceptor.t
#!/usr/bin/perl use strict; use warnings; use Test2::Tools::Tiny; use Test2::Hub::Interceptor; my $one = Test2::Hub::Interceptor->new(); ok($one->isa('Test2::Hub'), "inheritance");; my $e = exception { $one->terminate(55) }; ok($e->isa('Test2::Hub::Interceptor::Terminator'), "exception type"); like($$e, 'Label not found for "last T2_SUBTEST_WRAPPER"', "Could not find label"); done_testing;
CANCEL
Name
Type
Size
Modified
Actions
↩ ..
DIR
—
—
📁 Interceptor/
DIR
—
2026-04-06 11:01
📄 Interceptor.t
T
398 B
2024-10-29 00:00
EDIT
📄 Subtest.t
T
2.5 KB
2024-10-29 00:00
EDIT